package com.mjf.linkedlist;

public class DoubleLinkedListDemo {

    public static void main(String[] args) {

        // 进行测试
        // 先创建节点
        HeroNode2 hero1 = new HeroNode2(1, "宋江", "及时雨");
        HeroNode2 hero2 = new HeroNode2(2, "卢俊义", "玉麒麟");
        HeroNode2 hero3 = new HeroNode2(3, "吴用", "智多星");
        HeroNode2 hero4 = new HeroNode2(4, "林冲", "豹子头");

        // 创建一个链表
        DoubleLinkedList DoubleLinkedList = new DoubleLinkedList();
        // 加入
//		DoubleLinkedList.add(hero1);
//		DoubleLinkedList.add(hero2);
//		DoubleLinkedList.add(hero3);
//		DoubleLinkedList.add(hero4);

        // 加入按照编号的顺序
        DoubleLinkedList.addByOrder(hero4);
        DoubleLinkedList.addByOrder(hero2);
        DoubleLinkedList.addByOrder(hero1);
        DoubleLinkedList.addByOrder(hero3);
        DoubleLinkedList.addByOrder(hero3);

        // 显示链表
        DoubleLinkedList.list();

        // 修改编号为2的信息
        DoubleLinkedList.update(new HeroNode2(2, "小卢", "-玉麒麟-"));
        // 显示链表
        System.out.println("修改后的链表情况");
        DoubleLinkedList.list();

        // 删除一个节点
        DoubleLinkedList.delete(1);
        // 显示链表
        System.out.println("删除后的链表情况");
        DoubleLinkedList.list();


    }

}

/**
 * 双向链表
 */
class DoubleLinkedList {

    // 先初始化一个头节点，不存放具体数据
    private final HeroNode2 head = new HeroNode2(0, "", "");


    // 返回头节点
    public HeroNode2 getHead() {
        return head;
    }


    /**
     * 添加一个节点到双向列表末尾
     *
     * @param heroNode 待添加的节点
     */
    public void add(HeroNode2 heroNode) {

        // 因为head节点不能动，因此我们需要一个辅助变量temp来遍历
        HeroNode2 temp = head;

        // 遍历链表，找到最后
        while (temp.next != null) {
            // 如果没有找到，就将temp后移
            temp = temp.next;
        }

        // 当退出while循环时，temp就指向了链表的最后
        temp.next = heroNode;
        heroNode.pre = temp;

    }


    /**
     * 根据排名将节点插入到指定位置
     * <p>
     * 如果有这个排名，则添加失败，并给出提示
     *
     * @param heroNode 待添加的节点
     */
    public void addByOrder(HeroNode2 heroNode) {

        // 因为head节点不能动，因此我们需要一个辅助变量temp来帮助我们找到添加的位置
        // 我们找的temp是位于添加位置的前一个节点
        HeroNode2 temp = head;
        boolean flag = false;    // 标志添加的编号是否存在，默认为false

        while (true) {
            if (temp.next == null) {        // 说明temp已经在链表的最后
                break;
            }

            if (temp.next.no > heroNode.no) {    // 位置找到，就在temp的后面插入
                break;
            } else if (temp.next.no == heroNode.no) {    // 说明希望添加的heroNode的编号存在
                flag = true;    // 说明编号存在
                break;
            }

            temp = temp.next;    // 后移，遍历当前链表
        }

        // 判断flag的值
        if (flag) {
            System.out.printf("准备插入的英雄的编号%d已经存在，不能添加\n", heroNode.no);
        } else {
            // 插入到链表中temp后面
            if (temp.next == null) {        // 要插入的节点是尾节点
                temp.next = heroNode;
                heroNode.pre = temp;
            } else {                        // 要插入的节点不是尾节点
                heroNode.pre = temp;
                heroNode.next = temp.next;
                heroNode.pre.next = heroNode;
                heroNode.next.pre = heroNode;
            }
        }

    }


    // 删除节点
    //

    /**
     * 删除节点
     * <p>
     * 说明：双向链表可以自我删除
     *
     * @param no 要删除的节点编号
     */
    public void delete(int no) {
        if (head.next == null) {
            System.out.println("链表为空，无法删除");
            return;
        }

        HeroNode2 temp = head.next;
        boolean flag = false;    // 标志是否找到待删除节点的前一个节点
        while (true) {
            if (temp == null) {        // 已经到链表的最后
                break;
            }

            if (temp.no == no) {
                // 找到的待删除节点temp
                flag = true;
                break;
            }
            temp = temp.next;    // 节点后移
        }

        if (flag) {    // 找到
            temp.pre.next = temp.next;
            if (temp.next != null) {        // 如果要删除的节点不是最后一个节点才需要执行，否则会空指针异常
                temp.next.pre = temp.pre;
            }

        } else {
            System.out.printf("要删除的%d节点不存在\n", no);
        }
    }


    /**
     * 修改节点的信息，根据no来修改，即no不能修改
     *
     * @param newHeroNode 新节点
     */
    public void update(HeroNode2 newHeroNode) {
        // 判断是否为空
        if (head.next == null) {
            System.out.println("链表为空");
            return;
        }
        // 找到需要修改的节点，根据no编号
        // 定义一个辅助变量
        HeroNode2 temp = head.next;
        boolean flag = false;    // 标志是否找到该节点
        while (true) {
            if (temp == null) {
                break;    // 已经遍历完链表
            }

            if (temp.no == newHeroNode.no) {        // 找到
                flag = true;
                break;
            }

            temp = temp.next;
        }

        // 根据flag判断是否找到要修改的节点
        if (flag) {
            temp.name = newHeroNode.name;
            temp.nickname = newHeroNode.nickname;
        } else {
            System.out.printf("没有找到编号%d的节点\n", newHeroNode.no);
        }
    }

    /**
     * 显示链表[遍历]
     */
    public void list() {
        // 判断链表是否为空
        if (head.next == null) {
            System.out.println("链表为空");
            return;
        }

        // 因为头节点不能动，因此需要一个辅助变量来遍历
        HeroNode2 temp = head.next;
        while (temp != null) {  // 判断是否到链表最后
            // 输出节点的信息
            System.out.println(temp);
            // 将temp后移
            temp = temp.next;
        }
    }

}

/**
 * 双向链表节点
 */
class HeroNode2 {

    public int no;
    public String name;
    public String nickname;
    /**
     * 指向上一个节点
     */
    public HeroNode2 pre;
    /**
     * 指向下一个节点
     */
    public HeroNode2 next;

    public HeroNode2(int hNo, String hName, String hNickname) {
        this.no = hNo;
        this.name = hName;
        this.nickname = hNickname;
    }

    @Override
    public String toString() {
        return "HeroNode2 [no=" + no + ", name=" + name + ", nickname=" + nickname + "]";
    }


}